home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
System Booster
/
System Booster.iso
/
Archives
/
ForCLI
/
hlink2.lha
/
HLink2
/
Install_HLink
< prev
next >
Wrap
Text File
|
1995-09-05
|
2KB
|
127 lines
(message "Handy Link v2.0 Installation \n"
"\n"
"This version of HLink is FREEWARE !\n\n"
"<< Keep The Amiga Spirit Alive >>\n\n"
" Greatings from : \n"
"\n"
" Michael D.P. de Clerck\n"
" Increased Development.\n"
" August 1995 Rotterdam \n"
"\n"
)
; ask where to install HLink
(set vc-dest
(askdir
(prompt "Please select the Directory where you would like to "
"install HLink 2.0. I won't make a new directory ! "
)
(help @askdir-help)
(default @default-dest)
)
)
(set @default-dest vc-dest)
(
(working "Installing HLink 2.0 Program")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "HLink")
(dest @default-dest)
(infos)
)
)
(copyfiles
(prompt "Would you like to install the AmigaGuide documentation?")
(help @copyfiles-help)
(source "HLink.Guide")
(dest @default-dest)
(infos)
(confirm)
)
; ask where to install the NetScripts examples
(set nt-dest
(askdir
(prompt "Please select the Directory where you would like to "
"install the Netscript examples. "
)
(help @askdir-help)
(default @default-dest)
)
)
(set @script-dest nt-dest)
(
(working "Installing NetScripts examples")
(copyfiles
(source "NetScripts")
(dest @script-dest)
(all)
)
)
(
(working "Copying HLink configuration to S:")
(run "c:copy HLink.Config S:HLink.Config")
)
(
(working "Adding lines to S:User-startup sequence")
(run "c:type HLink.User-startup >> S:User-startup")
)
(
(working "Adding lines to S:Shell-startup sequence")
(run "c:type HLink.Shell-Startup >> S:Shell-startup")
)
(
(working "Copying Join command to C:Join")
(run "c:copy Join C:Join")
)
(message "Handy Link v2.0 Installation complete\n"
"\n"
"Make sure that the Serial.device exists\n"
"in the Devs: directory.\n\n"
"Now check the S:User-Startup file for the\n"
"right assigns.\n\n"
"Now reboot or execute the user-startup file\n"
"and open a new shell.\n\n"
"HLink can now be started, see documentation\n"
"for further support !\n"
"\n"
)
(exit)